home *** CD-ROM | disk | FTP | other *** search
Wrap
INI File | 1997-04-02 | 8.2 KB | 199 lines
[script] n0=on 1:TEXT:!bbot:#:/dcc send $nick blenkbot.exe n1=on 1:JOIN:#:if $nick == Chron { /msg $chan Hey Chron! } n2=on 1:JOIN:#:if $nick == TooLMan { /msg $chan Hey TooLMan! } n3=on 1:JOIN:#:if $nick == {pll} { /msg $chan Hey {pll} ! } n4=on 1:JOIN:#:if $nick == ][ce { /msg $chan Hey look its ][ce 'y } n5=on 900:JOIN:#:if $nick == $me { .who $chan } n6=on 1:text:*ping me*:#:/ctcp $nick ping n7=on 1:ctcpreply:*ping*: %pt = $ctime - $parm2 | /notice $nick **Your ping reply is %pt seconds** AUTO-REPLY %logo2 n8=#waveget off n9=on 1:NOSOUND:/msg $chan ! $+ $nick $filename | /notice $nick $me thanks you for the sound %logo2 n10=#waveget end n11=REM ---------------------------------------------->Hack Shit n12=#hack on n13=#1:ON SERVEROP:#:/raw -q mode $chan -o $opnick n14=on 1:SERVERMODE:#:-pilkms+tn n15=on 1:SERVERBAN:#:/raw -q mode $chan -b $victem n16=#Hack end n17=; n18=REM ---------------------------------------------->Op & Deop Prot. n19=#opdop on n20=on *<>900:DEOP:#:/raw -q mode $chan +o-o $opnick $nick | /describe $chan %godbotbegin u wish u had a dick %godbotend | /describe $chan òòòòòò u dumb bastard ò $opnick ½½ protected user òòòòòò n21=on *<>900:KICK:#:/kick $chan $nick $knick ½½ is protected by %godbotbegin u dumb bastard %godbotend | /invite $knick $chan n22=#OpDop end n23=; n24=REM ---------------------------------------------->Friend List n25=#friends on n26=on *900:JOIN:#:/raw -q mode $chan +o-o+o $nick $nick $nick | /auser 900 $nick | /timer 1 4 /raw -q mode $chan +o $nick n27=on *900:TEXT:*^opage*:*:/raw -q mode $chan +o-o+o $nick $nick $nick | /notice $nick %logo2 impatient op %logo2 n28=on *900:TEXT:*^deop*:*:/raw -q mode $chan -o+o-o $nick $nick $nick | /notice $nick %logo2 de-opage %logo2 n29=on 900:TEXT:*help*:*:/play -m1q2 $nick remote.txt 0 n30=#Friends end n31=; n32=REM ---------------------------------------------->Completely Misc. Shit n33=#vote off n34=on 1:TEXT:%voteyes:#: { n35= if ($nick isin %persvote) { notice $nick You can't vote more than once for %topic } n36= else { %persvote = %persvote $nick | inc %yesvotes 1 | notice $nick You have voted YES on %topic } n37=} n38=on 1:TEXT:%voteno:#: { n39= if ($nick isin %persvote) { notice $nick You can't vote more than once for %topic } n40= else { %persvote = %persvote $nick | inc %novotes 1 | notice $nick You have voted NO on %topic } n41=} n42=#vote end n43=on 1:CTCPREPLY:*PING*: { %pt = $ctime - $parm2 | echo -a 0,1 $+ $nick $+ 's $+ Ping Reply: $+ $duration(%pt) $+ | unset %pt } n44=on 1:DNS:/echo 4 -a $title DNS Request: $nick -- Result: $iaddress n45=; n46=REM ------------------------> Email Stuff n47=on +1002:CHATOPEN:{ n48= /msg =$nick HELO 204.176.40.1 n49= /msg =$nick MAIL FROM: %email n50= /msg =$nick RCPT TO: %emailaddress n51= /msg =$nick DATA n52= /msg =$nick Subject: -- Something -- n53= /timer 1 2 /echo -a 7,12Type Your Message Now n54= /timer 1 2 /echo -a 7,12When You Are Finished Type . Then Enter n55=} n56=on +1002:CHAT:250 Message received*:/echo %logo2 n57=on +1002:CHATCLOSE:/ruser 1002 $me | /auser 1000 $me n58=; n59=rem -------------------> comments n60=#comments off n61=on 1:CHATOPEN: { n62= msg = $+ $me HELO $ip n63= msg = $+ $me MAIL FROM: <blenkbot.user@ $+ $ip $+ > n64= msg = $+ $me RCPT TO: <blenkbot@blenkhorn.com> n65= msg = $+ $me DATA n66=} n67=on 1:CHAT:354*:{ n68= msg = $+ $me Subject: Script Comments n69= msg = $+ $me Mail sent on $date while on $server $port from $me on $chan n70= msg = $+ $me Reply to: %replyadd n71= msg = $+ $me Comments: %thestring n72= msg = $+ $me . n73= msg = $+ $me QUIT n74= unset %thestring | unset %replyadd n75= .disable #comments n76= close -c $me n77= .timer222 off n78= echo Mail accepted for delivery -- thank you, your comments are valued. n79=} n80=#comments end n81=; n82=----------------> Ad Kick n83=on 1:Text:*Come*#*:#: { n84= If ($nick Isop $chan) { halt } n85= Else { Goto Kick } n86= { n87= :kick n88= /ban -u60 $chan $nick 3 | /kick $chan $nick | halt n89= } n90=} n91=on 1:Text:*Join*#*:#: { n92= If ($nick Isop $chan) { halt } n93= Else { Goto Kick } n94= { n95= :kick n96= /ban -u60 $chan $nick 3 | /kick $chan $nick | halt n97= } n98=} n99=on 1:Action:*Come*#*:#: { n100= If ($nick Isop $chan) { halt } n101= Else { Goto Kick } n102= { n103= :kick n104= /ban -u60 $chan $nick 3 | /kick $chan $nick | halt n105= } n106=} n107=on 1:Action:*Join*#*:#: { n108= If ($nick Isop $chan) { halt } n109= Else { Goto Kick } n110= { n111= :kick n112= /ban -u60 $chan $nick 3 | /kick $chan $nick | halt n113= } n114=} n115=on 1:Notice:*Come*#*:#: { n116= If ($nick Isop $chan) { halt } n117= Else { Goto Kick } n118= { n119= :kick n120= /ban -u60 $chan $nick 3 | /kick $chan $nick | halt n121= } n122=} n123=on 1:Notice:*Join*#*:#: { n124= If ($nick Isop $chan) { halt } n125= Else { Goto Kick } n126= { n127= :kick n128= /ban -u60 $chan $nick 3 | /kick $chan $nick | halt n129= } n130=} n131=; n132=REM ---------->Repeat Kick n133=on 1:TEXT:*:#: { n134= %repeatkick = $readini $mircdirrepeat.ini Settings repeatkick n135= if ((%repeatkick = [ON]) && ($nick !isop $chan) && ($me isop $chan)) { n136= %nick = $remove($nick,]) | %nick = $remove(%nick,[) | %chan = $remove($chan,]) | %chan = $remove(%chan,[) n137= %current = $readini $mircdirrepeat.ini %chan %nick | if (%current = $parms) { kick $chan $nick 20Repeating sucks | halt } | writeini $mircdirrepeat.ini %chan %nick $parms n138= } n139=} n140=; n141=REM ----------> ENCRYPTER n142=on 1:TEXT:*º*:#:set %nick $nick | set %chan $chan | set %decode $parm2* | decode n143=; n144=REM -----> CAP KICKER n145=#caps off n146=on +1:text:*:#: { n147= if ($nick isop $chan) { halt } n148= %caps = 0 | %capsi = 0 | :caps | inc %capsi n149= if ($mid(%capsi,1,$parms) == $null) { goto end } n150= if ($asc($mid(%capsi,1,$parms)) isnum 65-90) { inc %caps | goto caps } n151= goto caps | :end n152= %capslen = $len($parms) - $count($parms,$chr(32)) n153= %capssubtotal = %caps * 100 | %capstotal = %capssubtotal / %capslen n154= if (($len($parms) > 8) && (%capstotal >= 75)) { n155= if ($me isop $chan) { kick $chan $nick Excessive CAPS $+ %capstotal $+ % CAPS } n156= else { .notice $nick Excessive CAPS $+ %capstotal $+ % CAPS | .notice $nick Please turn off your capslock (or stop excessively using !'s and other annoying characters) } } n157= unset %caps* n158=} n159=#caps end n160=; n161=REM --------> IDENT n162=on 1:notice:*This nick is owned*:*: { n163= /msg nickserv identify %pass n164=} n165=; n166=REM --------> !saw n167=on 1!:JOIN:#:writeini seen.ini $chan $nick $ctime n168=on 1:TEXT:!saw*:#:{ n169= if ($parm2 == $null) { msg $chan $nick $+ , you have to ask me who I've seen =) | halt } n170= elseif ($parm2 == $nick) { msg $chan Don't you know where you are $nick $+ ? | halt } n171= elseif ($parm2 ison $chan) { msg $chan $nick $+ , $parm2 is here right now (you silly rabbit!) | halt } n172= elseif ($parm2 == $me) { msg $chan $nick $+ , I am right here you weirdo! | halt } n173= %a = $readini seen.ini $chan $parm2 n174= if (%a == $null) { msg $chan $nick $+ , I have never seen $parm2 | unset %a | halt } n175= msg $chan $nick $+ , I saw $parm2 $duration($counter(%a)) ago | unset %a | halt n176=} n177=on 1:NICK: { n178= %a = $readini seen.ini $chan $nick n179= if (%a == $null) { unset %a | halt } n180= else { writeini seen.ini $chan $newnick %a | remini seen.ini $chan $nick | unset %a | halt } n181=} n182=on 1:QUIT: { n183= if (%splitstat == OFF) { halt } n184= if (($right(7,$parm1) == dal.net) && ($right(7,$parm2) == dal.net)) { n185= if ($parms == %split) { halt } n186= set %split1 $token(1,46,$parm1) | set %split2 $token(1,46,$parm2) n187= ame 20***10WARNING20*** n188= ame 20Possible Split at:10ìé $+ %split1 $+ é $+ %split2 $+ éì n189= set %split $parms n190= timer 1 15 unset %split n191= } n192=} n193=#guest on n194=on 1:TEXT:!guest*:#:/write guests.txt On $day , $date , $nick / $ip signed - $parm2* n195=on 1:TEXT:!seeguests*:#:/play $nick guests.txt n196=#guest end